home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Me-Mz / METROSTK.cpt / MetroStack / card_5352.txt < prev    next >
Text File  |  1989-04-11  |  28KB  |  1,110 lines
  1. -- card: 5352 from stack: in
  2. -- bmap block id: 5534
  3. -- flags: 0000
  4. -- background id: 2640
  5. -- name: west
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global boxText
  9.   put boxText into bg fld 1
  10. end openCard
  11.  
  12. on closeCard
  13.   hide cd fld 1
  14. end closeCard
  15.  
  16. on arrowKey which
  17.   if which is "right" then send mouseUp to cd btn 1
  18. end arrowKey
  19.  
  20.  
  21.  
  22.  
  23. -- part 2 (button)
  24. -- low flags: 00
  25. -- high flags: 2000
  26. -- rect: left=473 top=234 right=254 bottom=493
  27. -- title width / last selected line: 0
  28. -- icon id / first selected line: 1013 / 1013
  29. -- text alignment: 1
  30. -- font id: 0
  31. -- text size: 12
  32. -- style flags: 0
  33. -- line height: 16
  34. -- part name: East
  35. ----- HyperTalk script -----
  36. on mouseUp
  37.   set cursor to watch
  38.   visual dissolve fast
  39.   go cd "central"
  40. end mouseUp
  41.  
  42.  
  43.  
  44. -- part 3 (button)
  45. -- low flags: 00
  46. -- high flags: 2000
  47. -- rect: left=454 top=215 right=235 bottom=474
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 29003 / 29003
  50. -- text alignment: 1
  51. -- font id: 0
  52. -- text size: 12
  53. -- style flags: 0
  54. -- line height: 16
  55. -- part name: North
  56. ----- HyperTalk script -----
  57. on mouseUp
  58.  
  59. end mouseUp
  60.  
  61.  
  62.  
  63. -- part 4 (button)
  64. -- low flags: 00
  65. -- high flags: 2000
  66. -- rect: left=454 top=253 right=273 bottom=474
  67. -- title width / last selected line: 0
  68. -- icon id / first selected line: 29004 / 29004
  69. -- text alignment: 1
  70. -- font id: 0
  71. -- text size: 12
  72. -- style flags: 0
  73. -- line height: 16
  74. -- part name: South
  75.  
  76.  
  77. -- part 5 (button)
  78. -- low flags: 00
  79. -- high flags: 2000
  80. -- rect: left=435 top=234 right=254 bottom=455
  81. -- title width / last selected line: 0
  82. -- icon id / first selected line: 29001 / 29001
  83. -- text alignment: 1
  84. -- font id: 0
  85. -- text size: 12
  86. -- style flags: 0
  87. -- line height: 16
  88. -- part name: West
  89.  
  90.  
  91. -- part 6 (button)
  92. -- low flags: 00
  93. -- high flags: 0000
  94. -- rect: left=50 top=152 right=164 bottom=62
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 1
  98. -- font id: 0
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: 57Vienna
  103. ----- HyperTalk script -----
  104. on mouseUp
  105.   global station,stationNum,done,startEnd,tripOn,infoOn
  106.   if infoOn + tripOn = 0 then
  107.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  108.     exit mouseUp
  109.   end if
  110.   put 57 into foo
  111.   put the short name of me into station
  112.   SetupTrip foo
  113. end mouseUp
  114.  
  115.  
  116.  
  117. -- part 7 (button)
  118. -- low flags: 00
  119. -- high flags: 0000
  120. -- rect: left=78 top=152 right=164 bottom=90
  121. -- title width / last selected line: 0
  122. -- icon id / first selected line: 0 / 0
  123. -- text alignment: 1
  124. -- font id: 0
  125. -- text size: 12
  126. -- style flags: 0
  127. -- line height: 16
  128. -- part name: 17Dunn Loring
  129. ----- HyperTalk script -----
  130. on mouseUp
  131.   global station,stationNum,done,startEnd,tripOn,infoOn
  132.   if infoOn + tripOn = 0 then
  133.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  134.     exit mouseUp
  135.   end if
  136.   put 17 into foo
  137.   put the short name of me into station
  138.   SetupTrip foo
  139. end mouseUp
  140.  
  141.  
  142.  
  143. -- part 8 (button)
  144. -- low flags: 00
  145. -- high flags: 0000
  146. -- rect: left=127 top=166 right=178 bottom=139
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 0 / 0
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name: 59West Falls Church
  155. ----- HyperTalk script -----
  156. on mouseUp
  157.   global station,stationNum,done,startEnd,tripOn,infoOn
  158.   if infoOn + tripOn = 0 then
  159.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  160.     exit mouseUp
  161.   end if
  162.   put 59 into foo
  163.   put the short name of me into station
  164.   SetupTrip foo
  165. end mouseUp
  166.  
  167.  
  168.  
  169. -- part 9 (button)
  170. -- low flags: 00
  171. -- high flags: 0000
  172. -- rect: left=178 top=188 right=200 bottom=190
  173. -- title width / last selected line: 0
  174. -- icon id / first selected line: 0 / 0
  175. -- text alignment: 1
  176. -- font id: 0
  177. -- text size: 12
  178. -- style flags: 0
  179. -- line height: 16
  180. -- part name: 20East Falls Church
  181. ----- HyperTalk script -----
  182. on mouseUp
  183.   global station,stationNum,done,startEnd,tripOn,infoOn
  184.   if infoOn + tripOn = 0 then
  185.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  186.     exit mouseUp
  187.   end if
  188.   put 20 into foo
  189.   put the short name of me into station
  190.   SetupTrip foo
  191. end mouseUp
  192.  
  193.  
  194.  
  195. -- part 10 (button)
  196. -- low flags: 00
  197. -- high flags: 0000
  198. -- rect: left=230 top=188 right=200 bottom=242
  199. -- title width / last selected line: 0
  200. -- icon id / first selected line: 0 / 0
  201. -- text alignment: 1
  202. -- font id: 0
  203. -- text size: 12
  204. -- style flags: 0
  205. -- line height: 16
  206. -- part name: 4Ballston
  207. ----- HyperTalk script -----
  208. on mouseUp
  209.   global station,stationNum,done,startEnd,tripOn,infoOn
  210.   if infoOn + tripOn = 0 then
  211.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  212.     exit mouseUp
  213.   end if
  214.   put 4 into foo
  215.   put the short name of me into station
  216.   SetupTrip foo
  217. end mouseUp
  218.  
  219.  
  220.  
  221. -- part 11 (button)
  222. -- low flags: 00
  223. -- high flags: 0000
  224. -- rect: left=252 top=183 right=195 bottom=264
  225. -- title width / last selected line: 0
  226. -- icon id / first selected line: 0 / 0
  227. -- text alignment: 1
  228. -- font id: 0
  229. -- text size: 12
  230. -- style flags: 0
  231. -- line height: 16
  232. -- part name: 58Virginia Square-GMU
  233. ----- HyperTalk script -----
  234. on mouseUp
  235.   global station,stationNum,done,startEnd,tripOn,infoOn
  236.   if infoOn + tripOn = 0 then
  237.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  238.     exit mouseUp
  239.   end if
  240.   put 58 into foo
  241.   put the short name of me into station
  242.   SetupTrip foo
  243. end mouseUp
  244.  
  245.  
  246.  
  247. -- part 12 (button)
  248. -- low flags: 00
  249. -- high flags: 0000
  250. -- rect: left=267 top=175 right=187 bottom=279
  251. -- title width / last selected line: 0
  252. -- icon id / first selected line: 0 / 0
  253. -- text alignment: 1
  254. -- font id: 0
  255. -- text size: 12
  256. -- style flags: 0
  257. -- line height: 16
  258. -- part name: 12Clarendon
  259. ----- HyperTalk script -----
  260. on mouseUp
  261.   global station,stationNum,done,startEnd,tripOn,infoOn
  262.   if infoOn + tripOn = 0 then
  263.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  264.     exit mouseUp
  265.   end if
  266.   put 12 into foo
  267.   put the short name of me into station
  268.   SetupTrip foo
  269. end mouseUp
  270.  
  271.  
  272.  
  273. -- part 13 (button)
  274. -- low flags: 00
  275. -- high flags: 0000
  276. -- rect: left=282 top=167 right=179 bottom=294
  277. -- title width / last selected line: 0
  278. -- icon id / first selected line: 0 / 0
  279. -- text alignment: 1
  280. -- font id: 0
  281. -- text size: 12
  282. -- style flags: 0
  283. -- line height: 16
  284. -- part name: 14Court House
  285. ----- HyperTalk script -----
  286. on mouseUp
  287.   global station,stationNum,done,startEnd,tripOn,infoOn
  288.   if infoOn + tripOn = 0 then
  289.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  290.     exit mouseUp
  291.   end if
  292.   put 14 into foo
  293.   put the short name of me into station
  294.   SetupTrip foo
  295. end mouseUp
  296.  
  297.  
  298.  
  299. -- part 14 (button)
  300. -- low flags: 00
  301. -- high flags: 0000
  302. -- rect: left=295 top=161 right=173 bottom=307
  303. -- title width / last selected line: 0
  304. -- icon id / first selected line: 0 / 0
  305. -- text alignment: 1
  306. -- font id: 0
  307. -- text size: 12
  308. -- style flags: 0
  309. -- line height: 16
  310. -- part name: 47Rosslyn
  311. ----- HyperTalk script -----
  312. on mouseUp
  313.   global station,stationNum,done,startEnd,tripOn,infoOn
  314.   if infoOn + tripOn = 0 then
  315.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  316.     exit mouseUp
  317.   end if
  318.   put 47 into foo
  319.   put the short name of me into station
  320.   SetupTrip foo
  321. end mouseUp
  322.  
  323.  
  324.  
  325. -- part 15 (button)
  326. -- low flags: 00
  327. -- high flags: 0000
  328. -- rect: left=300 top=125 right=137 bottom=312
  329. -- title width / last selected line: 0
  330. -- icon id / first selected line: 0 / 0
  331. -- text alignment: 1
  332. -- font id: 0
  333. -- text size: 12
  334. -- style flags: 0
  335. -- line height: 16
  336. -- part name: 26Foggy Bottom-GWU
  337. ----- HyperTalk script -----
  338. on mouseUp
  339.   global station,stationNum,done,startEnd,tripOn,infoOn
  340.   if infoOn + tripOn = 0 then
  341.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  342.     exit mouseUp
  343.   end if
  344.   put 26 into foo
  345.   put the short name of me into station
  346.   SetupTrip foo
  347. end mouseUp
  348.  
  349.  
  350.  
  351. -- part 16 (button)
  352. -- low flags: 00
  353. -- high flags: 0000
  354. -- rect: left=317 top=125 right=137 bottom=329
  355. -- title width / last selected line: 0
  356. -- icon id / first selected line: 0 / 0
  357. -- text alignment: 1
  358. -- font id: 0
  359. -- text size: 12
  360. -- style flags: 0
  361. -- line height: 16
  362. -- part name: 23Farragut West
  363. ----- HyperTalk script -----
  364. on mouseUp
  365.   global station,stationNum,done,startEnd,tripOn,infoOn
  366.   if infoOn + tripOn = 0 then
  367.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  368.     exit mouseUp
  369.   end if
  370.   put the short name of me into foo
  371.   put the short name of me into station
  372.   SetupTrip foo
  373. end mouseUp
  374.  
  375.  
  376.  
  377. -- part 18 (button)
  378. -- low flags: 00
  379. -- high flags: 0000
  380. -- rect: left=351 top=125 right=137 bottom=363
  381. -- title width / last selected line: 0
  382. -- icon id / first selected line: 0 / 0
  383. -- text alignment: 1
  384. -- font id: 0
  385. -- text size: 12
  386. -- style flags: 0
  387. -- line height: 16
  388. -- part name: 36McPherson Square
  389. ----- HyperTalk script -----
  390. on mouseUp
  391.   global station,stationNum,done,startEnd,tripOn,infoOn
  392.   if infoOn + tripOn = 0 then
  393.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  394.     exit mouseUp
  395.   end if
  396.   put 36 into foo
  397.   put the short name of me into station
  398.   SetupTrip foo
  399. end mouseUp
  400.  
  401.  
  402.  
  403. -- part 19 (button)
  404. -- low flags: 00
  405. -- high flags: 0000
  406. -- rect: left=368 top=138 right=150 bottom=380
  407. -- title width / last selected line: 0
  408. -- icon id / first selected line: 0 / 0
  409. -- text alignment: 1
  410. -- font id: 0
  411. -- text size: 12
  412. -- style flags: 0
  413. -- line height: 16
  414. -- part name: 38Metro Center
  415. ----- HyperTalk script -----
  416. on mouseUp
  417.   global station,stationNum,done,startEnd,tripOn,infoOn
  418.   if infoOn + tripOn = 0 then
  419.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  420.     exit mouseUp
  421.   end if
  422.   put 38 into foo
  423.   put the short name of me into station
  424.   SetupTrip foo
  425. end mouseUp
  426.  
  427.  
  428.  
  429. -- part 20 (button)
  430. -- low flags: 00
  431. -- high flags: 0000
  432. -- rect: left=368 top=150 right=162 bottom=380
  433. -- title width / last selected line: 0
  434. -- icon id / first selected line: 0 / 0
  435. -- text alignment: 1
  436. -- font id: 0
  437. -- text size: 12
  438. -- style flags: 0
  439. -- line height: 16
  440. -- part name: 25Federal Triangle
  441. ----- HyperTalk script -----
  442. on mouseUp
  443.   global station,stationNum,done,startEnd,tripOn,infoOn
  444.   if infoOn + tripOn = 0 then
  445.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  446.     exit mouseUp
  447.   end if
  448.   put 25 into foo
  449.   put the short name of me into station
  450.   SetupTrip foo
  451. end mouseUp
  452.  
  453.  
  454.  
  455. -- part 21 (button)
  456. -- low flags: 00
  457. -- high flags: 0000
  458. -- rect: left=368 top=165 right=177 bottom=380
  459. -- title width / last selected line: 0
  460. -- icon id / first selected line: 0 / 0
  461. -- text alignment: 1
  462. -- font id: 0
  463. -- text size: 12
  464. -- style flags: 0
  465. -- line height: 16
  466. -- part name: 50Smithsonian
  467. ----- HyperTalk script -----
  468. on mouseUp
  469.   global station,stationNum,done,startEnd,tripOn,infoOn
  470.   if infoOn + tripOn = 0 then
  471.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  472.     exit mouseUp
  473.   end if
  474.   put 50 into foo
  475.   put the short name of me into station
  476.   SetupTrip foo
  477. end mouseUp
  478.  
  479.  
  480.  
  481. -- part 22 (button)
  482. -- low flags: 00
  483. -- high flags: 0000
  484. -- rect: left=384 top=175 right=187 bottom=396
  485. -- title width / last selected line: 0
  486. -- icon id / first selected line: 0 / 0
  487. -- text alignment: 1
  488. -- font id: 0
  489. -- text size: 12
  490. -- style flags: 0
  491. -- line height: 16
  492. -- part name: 35L'Enfant Plaza
  493. ----- HyperTalk script -----
  494. on mouseUp
  495.   global station,stationNum,done,startEnd,tripOn,infoOn
  496.   if infoOn + tripOn = 0 then
  497.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  498.     exit mouseUp
  499.   end if
  500.   put 35 into foo
  501.   put the short name of me into station
  502.   SetupTrip foo
  503. end mouseUp
  504.  
  505.  
  506.  
  507. -- part 23 (button)
  508. -- low flags: 00
  509. -- high flags: 0000
  510. -- rect: left=398 top=175 right=187 bottom=410
  511. -- title width / last selected line: 0
  512. -- icon id / first selected line: 0 / 0
  513. -- text alignment: 1
  514. -- font id: 0
  515. -- text size: 12
  516. -- style flags: 0
  517. -- line height: 16
  518. -- part name: 24Federal Center SW
  519. ----- HyperTalk script -----
  520. on mouseUp
  521.   global station,stationNum,done,startEnd,tripOn,infoOn
  522.   if infoOn + tripOn = 0 then
  523.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  524.     exit mouseUp
  525.   end if
  526.   put 24 into foo
  527.   put the short name of me into station
  528.   SetupTrip foo
  529. end mouseUp
  530.  
  531.  
  532.  
  533. -- part 24 (button)
  534. -- low flags: 00
  535. -- high flags: 0000
  536. -- rect: left=416 top=175 right=187 bottom=428
  537. -- title width / last selected line: 0
  538. -- icon id / first selected line: 0 / 0
  539. -- text alignment: 1
  540. -- font id: 0
  541. -- text size: 12
  542. -- style flags: 0
  543. -- line height: 16
  544. -- part name: 10Capitol South
  545. ----- HyperTalk script -----
  546. on mouseUp
  547.   global station,stationNum,done,startEnd,tripOn,infoOn
  548.   if infoOn + tripOn = 0 then
  549.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  550.     exit mouseUp
  551.   end if
  552.   put 10 into foo
  553.   put the short name of me into station
  554.   SetupTrip foo
  555. end mouseUp
  556.  
  557.  
  558.  
  559. -- part 25 (button)
  560. -- low flags: 00
  561. -- high flags: 0000
  562. -- rect: left=436 top=175 right=187 bottom=448
  563. -- title width / last selected line: 0
  564. -- icon id / first selected line: 0 / 0
  565. -- text alignment: 1
  566. -- font id: 0
  567. -- text size: 12
  568. -- style flags: 0
  569. -- line height: 16
  570. -- part name: 19Eastern Market
  571. ----- HyperTalk script -----
  572. on mouseUp
  573.   global station,stationNum,done,startEnd,tripOn,infoOn
  574.   if infoOn + tripOn = 0 then
  575.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  576.     exit mouseUp
  577.   end if
  578.   put the short name of me into foo
  579.   put the short name of me into station
  580.   SetupTrip foo
  581. end mouseUp
  582.  
  583.  
  584.  
  585. -- part 26 (button)
  586. -- low flags: 00
  587. -- high flags: 0000
  588. -- rect: left=347 top=245 right=257 bottom=359
  589. -- title width / last selected line: 0
  590. -- icon id / first selected line: 0 / 0
  591. -- text alignment: 1
  592. -- font id: 0
  593. -- text size: 12
  594. -- style flags: 0
  595. -- line height: 16
  596. -- part name: 40National Airport
  597. ----- HyperTalk script -----
  598. on mouseUp
  599.   global station,stationNum,done,startEnd,tripOn,infoOn
  600.   if infoOn + tripOn = 0 then
  601.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  602.     exit mouseUp
  603.   end if
  604.   put 40 into foo
  605.   put the short name of me into station
  606.   SetupTrip foo
  607. end mouseUp
  608.  
  609.  
  610.  
  611. -- part 27 (button)
  612. -- low flags: 00
  613. -- high flags: 0000
  614. -- rect: left=340 top=232 right=244 bottom=352
  615. -- title width / last selected line: 0
  616. -- icon id / first selected line: 0 / 0
  617. -- text alignment: 1
  618. -- font id: 0
  619. -- text size: 12
  620. -- style flags: 0
  621. -- line height: 16
  622. -- part name: 15Crystal City
  623. ----- HyperTalk script -----
  624. on mouseUp
  625.   global station,stationNum,done,startEnd,tripOn,infoOn
  626.   if infoOn + tripOn = 0 then
  627.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  628.     exit mouseUp
  629.   end if
  630.   put 15 into foo
  631.   put the short name of me into station
  632.   SetupTrip foo
  633. end mouseUp
  634.  
  635.  
  636.  
  637. -- part 28 (button)
  638. -- low flags: 00
  639. -- high flags: 0000
  640. -- rect: left=329 top=225 right=237 bottom=341
  641. -- title width / last selected line: 0
  642. -- icon id / first selected line: 0 / 0
  643. -- text alignment: 1
  644. -- font id: 0
  645. -- text size: 12
  646. -- style flags: 0
  647. -- line height: 16
  648. -- part name: 43Pentagon City
  649. ----- HyperTalk script -----
  650. on mouseUp
  651.   global station,stationNum,done,startEnd,tripOn,infoOn
  652.   if infoOn + tripOn = 0 then
  653.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  654.     exit mouseUp
  655.   end if
  656.   put 43 into foo
  657.   put the short name of me into station
  658.   SetupTrip foo
  659. end mouseUp
  660.  
  661.  
  662.  
  663. -- part 29 (button)
  664. -- low flags: 00
  665. -- high flags: 0000
  666. -- rect: left=329 top=213 right=225 bottom=341
  667. -- title width / last selected line: 0
  668. -- icon id / first selected line: 0 / 0
  669. -- text alignment: 1
  670. -- font id: 0
  671. -- text size: 12
  672. -- style flags: 0
  673. -- line height: 16
  674. -- part name: 42Pentagon
  675. ----- HyperTalk script -----
  676. on mouseUp
  677.   global station,stationNum,done,startEnd,tripOn,infoOn
  678.   if infoOn + tripOn = 0 then
  679.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  680.     exit mouseUp
  681.   end if
  682.   put 42 into foo
  683.   put the short name of me into station
  684.   SetupTrip foo
  685. end mouseUp
  686.  
  687.  
  688.  
  689. -- part 30 (button)
  690. -- low flags: 00
  691. -- high flags: 0000
  692. -- rect: left=309 top=181 right=193 bottom=321
  693. -- title width / last selected line: 0
  694. -- icon id / first selected line: 0 / 0
  695. -- text alignment: 1
  696. -- font id: 0
  697. -- text size: 12
  698. -- style flags: 0
  699. -- line height: 16
  700. -- part name: 3Arlington Cemetary
  701. ----- HyperTalk script -----
  702. on mouseUp
  703.   global station,stationNum,done,startEnd,tripOn,infoOn
  704.   if infoOn + tripOn = 0 then
  705.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  706.     exit mouseUp
  707.   end if
  708.   put 3 into foo
  709.   put the short name of me into station
  710.   SetupTrip foo
  711. end mouseUp
  712.  
  713.  
  714.  
  715. -- part 31 (button)
  716. -- low flags: 00
  717. -- high flags: 0000
  718. -- rect: left=384 top=152 right=164 bottom=396
  719. -- title width / last selected line: 0
  720. -- icon id / first selected line: 0 / 0
  721. -- text alignment: 1
  722. -- font id: 0
  723. -- text size: 12
  724. -- style flags: 0
  725. -- line height: 16
  726. -- part name: 2Archives
  727. ----- HyperTalk script -----
  728. on mouseUp
  729.   global station,stationNum,done,startEnd,tripOn,infoOn
  730.   if infoOn + tripOn = 0 then
  731.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  732.     exit mouseUp
  733.   end if
  734.   put 2 into foo
  735.   put the short name of me into station
  736.   SetupTrip foo
  737. end mouseUp
  738.  
  739.  
  740.  
  741. -- part 32 (button)
  742. -- low flags: 00
  743. -- high flags: 0000
  744. -- rect: left=384 top=138 right=150 bottom=396
  745. -- title width / last selected line: 0
  746. -- icon id / first selected line: 0 / 0
  747. -- text alignment: 1
  748. -- font id: 0
  749. -- text size: 12
  750. -- style flags: 0
  751. -- line height: 16
  752. -- part name: 29Gallery Place
  753. ----- HyperTalk script -----
  754. on mouseUp
  755.   global station,stationNum,done,startEnd,tripOn,infoOn
  756.   if infoOn + tripOn = 0 then
  757.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  758.     exit mouseUp
  759.   end if
  760.   put 29 into foo
  761.   put the short name of me into station
  762.   SetupTrip foo
  763. end mouseUp
  764.  
  765.  
  766.  
  767. -- part 33 (button)
  768. -- low flags: 00
  769. -- high flags: 0000
  770. -- rect: left=261 top=47 right=59 bottom=273
  771. -- title width / last selected line: 0
  772. -- icon id / first selected line: 0 / 0
  773. -- text alignment: 1
  774. -- font id: 0
  775. -- text size: 12
  776. -- style flags: 0
  777. -- line height: 16
  778. -- part name: 28Friendship Heights
  779. ----- HyperTalk script -----
  780. on mouseUp
  781.   global station,stationNum,done,startEnd,tripOn,infoOn
  782.   if infoOn + tripOn = 0 then
  783.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  784.     exit mouseUp
  785.   end if
  786.   put 28 into foo
  787.   put the short name of me into station
  788.   SetupTrip foo
  789. end mouseUp
  790.  
  791.  
  792.  
  793. -- part 34 (button)
  794. -- low flags: 00
  795. -- high flags: 0000
  796. -- rect: left=261 top=59 right=71 bottom=273
  797. -- title width / last selected line: 0
  798. -- icon id / first selected line: 0 / 0
  799. -- text alignment: 1
  800. -- font id: 0
  801. -- text size: 12
  802. -- style flags: 0
  803. -- line height: 16
  804. -- part name: 53Tenleytown
  805. ----- HyperTalk script -----
  806. on mouseUp
  807.   global station,stationNum,done,startEnd,tripOn,infoOn
  808.   if infoOn + tripOn = 0 then
  809.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  810.     exit mouseUp
  811.   end if
  812.   put 53 into foo
  813.   put the short name of me into station
  814.   SetupTrip foo
  815. end mouseUp
  816.  
  817.  
  818.  
  819. -- part 35 (button)
  820. -- low flags: 00
  821. -- high flags: 0000
  822. -- rect: left=292 top=64 right=76 bottom=304
  823. -- title width / last selected line: 0
  824. -- icon id / first selected line: 0 / 0
  825. -- text alignment: 1
  826. -- font id: 0
  827. -- text size: 12
  828. -- style flags: 0
  829. -- line height: 16
  830. -- part name: 56Van Ness-UDC
  831. ----- HyperTalk script -----
  832. on mouseUp
  833.   global station,stationNum,done,startEnd,tripOn,infoOn
  834.   if infoOn + tripOn = 0 then
  835.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  836.     exit mouseUp
  837.   end if
  838.   put 56 into foo
  839.   put the short name of me into station
  840.   SetupTrip foo
  841. end mouseUp
  842.  
  843.  
  844.  
  845. -- part 36 (button)
  846. -- low flags: 00
  847. -- high flags: 0000
  848. -- rect: left=299 top=75 right=87 bottom=311
  849. -- title width / last selected line: 0
  850. -- icon id / first selected line: 0 / 0
  851. -- text alignment: 1
  852. -- font id: 0
  853. -- text size: 12
  854. -- style flags: 0
  855. -- line height: 16
  856. -- part name: 13Cleveland Park
  857. ----- HyperTalk script -----
  858. on mouseUp
  859.   global station,stationNum,done,startEnd,tripOn,infoOn
  860.   if infoOn + tripOn = 0 then
  861.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  862.     exit mouseUp
  863.   end if
  864.   put 13 into foo
  865.   put the short name of me into station
  866.   SetupTrip foo
  867. end mouseUp
  868.  
  869.  
  870.  
  871. -- part 37 (button)
  872. -- low flags: 00
  873. -- high flags: 0000
  874. -- rect: left=307 top=88 right=100 bottom=319
  875. -- title width / last selected line: 0
  876. -- icon id / first selected line: 0 / 0
  877. -- text alignment: 1
  878. -- font id: 0
  879. -- text size: 12
  880. -- style flags: 0
  881. -- line height: 16
  882. -- part name: 61Woodley Park/Zoo
  883. ----- HyperTalk script -----
  884. on mouseUp
  885.   global station,stationNum,done,startEnd,tripOn,infoOn
  886.   if infoOn + tripOn = 0 then
  887.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  888.     exit mouseUp
  889.   end if
  890.   put 61 into foo
  891.   put the short name of me into station
  892.   SetupTrip foo
  893. end mouseUp
  894.  
  895.  
  896.  
  897. -- part 38 (button)
  898. -- low flags: 00
  899. -- high flags: 0000
  900. -- rect: left=316 top=100 right=112 bottom=328
  901. -- title width / last selected line: 0
  902. -- icon id / first selected line: 0 / 0
  903. -- text alignment: 1
  904. -- font id: 0
  905. -- text size: 12
  906. -- style flags: 0
  907. -- line height: 16
  908. -- part name: 18Dupont Circle
  909. ----- HyperTalk script -----
  910. on mouseUp
  911.   global station,stationNum,done,startEnd,tripOn,infoOn
  912.   if infoOn + tripOn = 0 then
  913.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  914.     exit mouseUp
  915.   end if
  916.   put 18 into foo
  917.   put the short name of me into station
  918.   SetupTrip foo
  919. end mouseUp
  920.  
  921.  
  922.  
  923. -- part 39 (button)
  924. -- low flags: 00
  925. -- high flags: 0000
  926. -- rect: left=323 top=113 right=125 bottom=335
  927. -- title width / last selected line: 0
  928. -- icon id / first selected line: 0 / 0
  929. -- text alignment: 1
  930. -- font id: 0
  931. -- text size: 12
  932. -- style flags: 0
  933. -- line height: 16
  934. -- part name: 22Farragut North
  935. ----- HyperTalk script -----
  936. on mouseUp
  937.   global station,stationNum,done,startEnd,tripOn,infoOn
  938.   if infoOn + tripOn = 0 then
  939.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  940.     exit mouseUp
  941.   end if
  942.   put 22 into foo
  943.   put the short name of me into station
  944.   SetupTrip foo
  945. end mouseUp
  946.  
  947.  
  948.  
  949. -- part 40 (button)
  950. -- low flags: 00
  951. -- high flags: 0000
  952. -- rect: left=410 top=137 right=149 bottom=422
  953. -- title width / last selected line: 0
  954. -- icon id / first selected line: 0 / 0
  955. -- text alignment: 1
  956. -- font id: 0
  957. -- text size: 12
  958. -- style flags: 0
  959. -- line height: 16
  960. -- part name: 32Judiciary Square
  961. ----- HyperTalk script -----
  962. on mouseUp
  963.   global station,stationNum,done,startEnd,tripOn,infoOn
  964.   if infoOn + tripOn = 0 then
  965.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  966.     exit mouseUp
  967.   end if
  968.   put 32 into foo
  969.   put the short name of me into station
  970.   SetupTrip foo
  971. end mouseUp
  972.  
  973.  
  974.  
  975. -- part 41 (button)
  976. -- low flags: 00
  977. -- high flags: 0000
  978. -- rect: left=425 top=129 right=141 bottom=437
  979. -- title width / last selected line: 0
  980. -- icon id / first selected line: 0 / 0
  981. -- text alignment: 1
  982. -- font id: 0
  983. -- text size: 12
  984. -- style flags: 0
  985. -- line height: 16
  986. -- part name: 55Union Station
  987. ----- HyperTalk script -----
  988. on mouseUp
  989.   global station,stationNum,done,startEnd,tripOn,infoOn
  990.   if infoOn + tripOn = 0 then
  991.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  992.     exit mouseUp
  993.   end if
  994.   put 55 into foo
  995.   put the short name of me into station
  996.   SetupTrip foo
  997. end mouseUp
  998.  
  999.  
  1000.  
  1001. -- part 42 (button)
  1002. -- low flags: 00
  1003. -- high flags: 0000
  1004. -- rect: left=425 top=109 right=121 bottom=437
  1005. -- title width / last selected line: 0
  1006. -- icon id / first selected line: 0 / 0
  1007. -- text alignment: 1
  1008. -- font id: 0
  1009. -- text size: 12
  1010. -- style flags: 0
  1011. -- line height: 16
  1012. -- part name: 45Rhode Island Avenue
  1013. ----- HyperTalk script -----
  1014. on mouseUp
  1015.   global station,stationNum,done,startEnd,tripOn,infoOn
  1016.   if infoOn + tripOn = 0 then
  1017.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  1018.     exit mouseUp
  1019.   end if
  1020.   put 45 into foo
  1021.   put the short name of me into station
  1022.   SetupTrip foo
  1023. end mouseUp
  1024.  
  1025.  
  1026.  
  1027. -- part 43 (button)
  1028. -- low flags: 00
  1029. -- high flags: 0000
  1030. -- rect: left=425 top=84 right=96 bottom=437
  1031. -- title width / last selected line: 0
  1032. -- icon id / first selected line: 0 / 0
  1033. -- text alignment: 1
  1034. -- font id: 0
  1035. -- text size: 12
  1036. -- style flags: 0
  1037. -- line height: 16
  1038. -- part name: 8Brookland-CUA
  1039. ----- HyperTalk script -----
  1040. on mouseUp
  1041.   global station,stationNum,done,startEnd,tripOn,infoOn
  1042.   if infoOn + tripOn = 0 then
  1043.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  1044.     exit mouseUp
  1045.   end if
  1046.   put 8 into foo
  1047.   put the short name of me into station
  1048.   SetupTrip foo
  1049. end mouseUp
  1050.  
  1051.  
  1052.  
  1053. -- part 44 (button)
  1054. -- low flags: 00
  1055. -- high flags: 0000
  1056. -- rect: left=418 top=51 right=63 bottom=430
  1057. -- title width / last selected line: 0
  1058. -- icon id / first selected line: 0 / 0
  1059. -- text alignment: 1
  1060. -- font id: 0
  1061. -- text size: 12
  1062. -- style flags: 0
  1063. -- line height: 16
  1064. -- part name: 27Fort Trotten
  1065. ----- HyperTalk script -----
  1066. on mouseUp
  1067.   global station,stationNum,done,startEnd,tripOn,infoOn
  1068.   if infoOn + tripOn = 0 then
  1069.     answer "Please click either the ""e&"Trip""e&" or ""e&"Info"& quote&" button on control bar first." with "OK"
  1070.     exit mouseUp
  1071.   end if
  1072.   put 27 into foo
  1073.   put the short name of me into station
  1074.   SetupTrip foo
  1075. end mouseUp
  1076.  
  1077.  
  1078.  
  1079. -- part 45 (field)
  1080. -- low flags: 81
  1081. -- high flags: 2004
  1082. -- rect: left=142 top=99 right=223 bottom=366
  1083. -- title width / last selected line: 0
  1084. -- icon id / first selected line: 0 / 0
  1085. -- text alignment: 1
  1086. -- font id: 0
  1087. -- text size: 12
  1088. -- style flags: 0
  1089. -- line height: 16
  1090. -- part name: 
  1091. ----- HyperTalk script -----
  1092. on mouseUp
  1093.   hide Me
  1094. end mouseUp
  1095.  
  1096.  
  1097.  
  1098. -- part contents for card part 45
  1099. ----- text -----
  1100.  
  1101. Fort Trotten station
  1102. (Red line)
  1103. Entrance:
  1104. Galloway Street east
  1105. of South Dakota Ave. NE
  1106.  
  1107. -- part contents for background part 10
  1108. ----- text -----
  1109. Click on a station to get info
  1110. (or click this box to cancel)